We received an event of 'inactive', (the user closed the lister), so we 
start cleaning up. 
 
  1call delete('T:ArcDir.list'handle) 
  2call closeport(handlername) 
  3if catalog ~= 0 then 
  4  call closecatalog(catalog) 
  5exit 
 
Line: 
 1      We delete the archive list that ArcDir was using to list the archive. 
 2      Close the message port. 
 3 - 4  If we opened a catalog, then we close it. 
 5      Bye Bye